(Fsave_current_buffer): Use set_buffer_if_live.

diff --git a/src/editfns.c b/src/editfns.c
index fa6881c35b3600b52191dbbdcb780a48dc4511a5..698abeadae8e0ed66bb2846b8bcd6b2665b04df2 100644 (file)
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -402,7 +402,7 @@ Executes BODY just like `progn'.")
   register Lisp_Object val;
   int count = specpdl_ptr - specpdl;
 
-  record_unwind_protect (Fset_buffer, Fcurrent_buffer ());
+  record_unwind_protect (set_buffer_if_live, Fcurrent_buffer ());
 
   val = Fprogn (args);
   return unbind_to (count, val);